MacWorld 1997 September

home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 1997 September / Macworld (1997-09).dmg / Serious Software / Cherwell Scientific Demos / pro Fit / pro Fit 5.0 demo (68k).sea / pro Fit 5.0 demo (68k) / External Modules / External modules sources / C / FunctionTemplate.c < prev next >
MacBinary | 1996-01-02 | 6.9 KB | [TEXT/KAHL]
view JSON data |
view as text |
open on a Mac |
open on a PC

This file was processed as: MacBinary (archive/macBinary).

You can browse this item here: FunctionTemplate.c
Confidence	Program	Detection	Match Type	Support
`66%`	dexvert	Compact Compressed (Unix) `(archive/compact)`	ext	Supported
`10%`	dexvert	MacBinary `(archive/macBinary)`	fallback	Supported
`1%`	dexvert	Text File `(text/txt)`	fallback	Supported
`100%`	file	MacBinary II, inited, bozo, Tue Jan 2 22:36:37 1996, modified Tue Jan 2 22:36:37 1996, creator Think C, type ASCII, 6457 bytes "FunctionTemplate.c" , at 0x19b9 382 bytes resource	default (weak)
`99%`	file	data	default
`74%`	TrID	Macintosh plain text (MacBinary)	default
`25%`	TrID	MacBinary 2	default (weak)
`100%`	siegfried	fmt/1762 MacBinary (II)	default
`100%`	lsar	MacBinary	default
id metadata
key	value
macFileType	`[TEXT]`
macFileCreator	`[KAHL]`
hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 12 46 75 6e 63 74 69 | 6f 6e 54 65 6d 70 6c 61 |..Functi|onTempla|
|00000010| 74 65 2e 63 00 00 00 00 | 00 00 00 00 00 00 00 00 |te.c....|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 09 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 19 39 00 | 00 01 7e ad 0f aa 45 ad |......9.|..~...E.|
|00000060| 0f aa 45 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..E.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 9c a7 00 00 |........|........|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0d 2f 2a 20 46 75 6e |********|/./* Fun|
|000000e0| 63 74 69 6f 6e 54 65 6d | 70 6c 61 74 65 2e 63 20 |ctionTem|plate.c |
|000000f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000100| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000110| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000120| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000130| 20 20 2a 2f 0d 2f 2a 20 | 09 09 09 09 09 09 09 09 |  */./* |........|
|00000140| 09 09 09 09 09 20 20 20 | 20 20 20 20 20 20 20 20 |.....   |        |
|00000150| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000160| 20 20 20 20 20 20 20 20 | 2a 2f 0d 2f 2a 20 20 20 |        |*/./*   |
|00000170| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000180| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000190| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001b0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001c0| 20 20 2a 2f 0d 2f 2a 20 | 56 65 72 73 69 6f 6e 20 |  */./* |Version |
|000001d0| 31 35 2e 31 32 2e 39 35 | 20 20 20 20 20 20 20 20 |15.12.95|        |
|000001e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000001f0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000200| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|00000210| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 2a 2f 0d |        |     */.|
|00000220| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000230| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000240| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000250| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000260| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000270| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0d 0d 0d 23 69 6e 63 |********|/...#inc|
|00000280| 6c 75 64 65 20 22 70 72 | 6f 46 69 74 5f 69 6e 74 |lude "pr|oFit_int|
|00000290| 65 72 66 61 63 65 2e 68 | 22 0d 0d 0d 0d 2f 2a 2a |erface.h|"..../**|
|000002a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000002f0| 2a 2a 2a 2a 2a 2f 0d 0d | 76 6f 69 64 20 53 65 74 |*****/..|void Set|
|00000300| 55 70 20 28 09 73 68 6f | 72 74 2a 20 63 6f 6e 73 |Up (.sho|rt* cons|
|00000310| 74 20 6d 6f 64 75 6c 65 | 4b 69 6e 64 2c 09 09 2f |t module|Kind,../|
|00000320| 2a 20 73 65 74 20 6d 6f | 64 75 6c 65 4b 69 6e 64 |* set mo|duleKind|
|00000330| 20 74 6f 20 69 73 46 75 | 6e 63 74 69 6f 6e 20 6f | to isFu|nction o|
|00000340| 72 20 69 73 50 72 6f 67 | 72 61 6d 20 2a 2f 0d 09 |r isProg|ram */..|
|00000350| 09 09 09 53 74 72 32 35 | 35 20 6e 61 6d 65 2c 09 |...Str25|5 name,.|
|00000360| 09 09 09 09 2f 2a 20 74 | 68 65 20 6e 61 6d 65 20 |..../* t|he name |
|00000370| 6f 66 20 74 68 65 20 70 | 72 6f 67 72 61 6d 20 6f |of the p|rogram o|
|00000380| 72 20 66 75 6e 63 74 69 | 6f 6e 20 28 70 61 73 63 |r functi|on (pasc|
|00000390| 61 6c 20 73 74 72 69 6e | 67 29 20 2a 2f 0d 09 09 |al strin|g) */...|
|000003a0| 09 09 6c 6f 6e 67 2a 20 | 63 6f 6e 73 74 20 72 65 |..long* |const re|
|000003b0| 71 75 69 72 65 64 47 6c | 6f 62 61 6c 73 2c 09 2f |quiredGl|obals,./|
|000003c0| 2a 20 74 68 65 20 6e 75 | 6d 62 65 72 20 6f 66 20 |* the nu|mber of |
|000003d0| 62 79 74 65 73 20 74 6f | 20 62 65 20 61 6c 6c 6f |bytes to| be allo|
|000003e0| 63 61 74 65 64 20 69 6e | 20 45 78 74 4d 6f 64 75 |cated in| ExtModu|
|000003f0| 6c 65 73 50 61 72 61 6d | 42 6c 6f 63 6b 2e 67 6c |lesParam|Block.gl|
|00000400| 6f 62 61 6c 73 20 2a 2f | 0d 09 09 09 09 09 09 09 |obals */|........|
|00000410| 09 09 09 09 09 2f 2a 20 | 73 65 74 20 72 65 71 75 |...../* |set requ|
|00000420| 69 72 65 64 47 6c 6f 62 | 61 6c 73 20 74 6f 20 30 |iredGlob|als to 0|
|00000430| 20 69 66 20 79 6f 75 20 | 64 6f 6e 27 74 20 75 73 | if you |don't us|
|00000440| 65 20 74 68 69 73 20 66 | 65 61 74 75 72 65 20 2a |e this f|eature *|
|00000450| 2f 0d 09 09 09 09 45 78 | 74 4d 6f 64 75 6c 65 73 |/.....Ex|tModules|
|00000460| 50 61 72 61 6d 42 6c 6f | 63 6b 2a 20 70 62 29 09 |ParamBlo|ck* pb).|
|00000470| 09 2f 2a 20 74 68 65 20 | 63 6f 6d 70 6c 65 74 65 |./* the |complete|
|00000480| 20 70 61 72 61 6d 65 74 | 65 72 20 62 6c 6f 63 6b | paramet|er block|
|00000490| 20 70 61 73 73 65 64 20 | 62 79 20 70 72 6f 20 46 | passed |by pro F|
|000004a0| 69 74 20 74 6f 20 74 68 | 65 20 2a 2f 0d 09 09 09 |it to th|e */....|
|000004b0| 09 09 09 09 09 09 09 09 | 09 2f 2a 20 72 6f 75 74 |........|./* rout|
|000004c0| 69 6e 65 73 20 64 65 66 | 69 6e 65 64 20 69 6e 20 |ines def|ined in |
|000004d0| 74 68 69 73 20 66 69 6c | 65 2e 20 49 6e 20 6d 6f |this fil|e. In mo|
|000004e0| 73 74 20 63 61 73 65 73 | 20 69 74 20 63 61 6e 20 |st cases| it can |
|000004f0| 62 65 20 69 67 6e 6f 72 | 65 64 20 2a 2f 0d 2f 2a |be ignor|ed */./*|
|00000500| 20 53 65 74 55 70 20 69 | 73 20 63 61 6c 6c 65 64 | SetUp i|s called|
|00000510| 20 6f 6e 63 65 20 77 68 | 65 6e 20 74 68 65 20 65 | once wh|en the e|
|00000520| 78 74 65 72 6e 61 6c 20 | 6d 6f 64 75 6c 65 20 69 |xternal |module i|
|00000530| 73 20 6c 69 6e 6b 65 64 | 20 74 6f 20 70 72 6f 46 |s linked| to proF|
|00000540| 69 74 20 2a 2f 0d 7b 0d | 09 2a 6d 6f 64 75 6c 65 |it */.{.|.*module|
|00000550| 4b 69 6e 64 3d 69 73 46 | 75 6e 63 74 69 6f 6e 3b |Kind=isF|unction;|
|00000560| 09 09 09 09 2f 2a 20 77 | 65 20 64 65 66 69 6e 65 |..../* w|e define|
|00000570| 20 61 20 66 75 6e 63 74 | 69 6f 6e 20 2a 2f 0d 09 | a funct|ion */..|
|00000580| 53 65 74 50 61 73 63 61 | 6c 53 74 72 28 6e 61 6d |SetPasca|lStr(nam|
|00000590| 65 2c 22 5c 70 22 2c 32 | 35 35 29 3b 09 09 2f 2a |e,"\p",2|55);../*|
|000005a0| 20 77 72 69 74 65 20 69 | 74 73 20 6e 61 6d 65 20 | write i|ts name |
|000005b0| 68 65 72 65 20 2a 2f 0d | 09 2a 72 65 71 75 69 72 |here */.|.*requir|
|000005c0| 65 64 47 6c 6f 62 61 6c | 73 20 3d 20 30 3b 09 09 |edGlobal|s = 0;..|
|000005d0| 09 09 2f 2a 20 6c 65 61 | 76 65 20 74 68 69 73 20 |../* lea|ve this |
|000005e0| 6c 69 6b 65 20 69 74 20 | 69 73 20 6e 6f 77 20 69 |like it |is now i|
|000005f0| 66 20 79 6f 75 20 64 6f | 6e 27 74 20 6e 65 65 64 |f you do|n't need|
|00000600| 20 74 6f 20 61 6c 6c 6f | 63 61 74 65 20 67 6c 6f | to allo|cate glo|
|00000610| 62 61 6c 20 76 61 72 69 | 61 62 6c 65 09 2a 2f 0d |bal vari|able.*/.|
|00000620| 09 09 09 09 09 09 09 09 | 09 09 2f 2a 20 73 70 61 |........|../* spa|
|00000630| 63 65 20 75 73 69 6e 67 | 20 61 20 70 6f 69 6e 74 |ce using| a point|
|00000640| 65 72 2e 2a 2f 0d 09 09 | 09 09 09 09 09 09 09 09 |er.*/...|........|
|00000650| 2f 2a 20 73 65 74 20 74 | 68 69 73 20 74 6f 20 61 |/* set t|his to a|
|00000660| 20 70 6f 69 6e 74 65 72 | 20 73 69 7a 65 20 69 66 | pointer| size if|
|00000670| 20 79 6f 75 20 77 61 6e | 74 20 74 6f 20 75 73 65 | you wan|t to use|
|00000680| 2a 2f 0d 09 09 09 09 09 | 09 09 09 09 09 2f 2a 20 |*/......|...../* |
|00000690| 74 68 65 20 70 6f 69 6e | 74 65 72 20 22 67 6c 6f |the poin|ter "glo|
|000006a0| 62 61 6c 73 22 20 70 72 | 6f 76 69 64 65 64 20 69 |bals" pr|ovided i|
|000006b0| 6e 20 45 78 74 4d 6f 64 | 75 6c 65 73 50 61 72 61 |n ExtMod|ulesPara|
|000006c0| 6d 42 6c 6f 63 6b 2a 2f | 0d 7d 0d 0d 2f 2a 2a 2a |mBlock*/|.}../***|
|000006d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000006f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000700| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000710| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000720| 2a 2a 2a 2a 2f 0d 0d 76 | 6f 69 64 20 49 6e 69 74 |****/..v|oid Init|
|00000730| 69 61 6c 69 7a 65 46 75 | 6e 63 20 28 0d 09 09 09 |ializeFu|nc (....|
|00000740| 09 42 6f 6f 6c 65 61 6e | 2a 20 63 6f 6e 73 74 20 |.Boolean|* const |
|00000750| 68 61 73 44 65 72 69 76 | 61 74 69 76 65 73 2c 09 |hasDeriv|atives,.|
|00000760| 2f 2a 20 73 65 74 20 74 | 68 69 73 20 74 6f 20 74 |/* set t|his to t|
|00000770| 72 75 65 20 69 66 20 79 | 6f 75 20 64 6f 20 63 61 |rue if y|ou do ca|
|00000780| 6c 63 75 6c 61 74 65 20 | 73 6f 6d 65 20 64 65 72 |lculate |some der|
|00000790| 69 76 61 74 69 76 65 73 | 20 28 64 79 64 61 5b 5d |ivatives| (dyda[]|
|000007a0| 29 20 69 6e 20 74 68 65 | 20 2a 2f 0d 09 09 09 09 |) in the| */.....|
|000007b0| 09 09 09 09 09 09 09 09 | 2f 2a 20 22 44 65 72 69 |........|/* "Deri|
|000007c0| 76 61 74 69 76 65 73 22 | 20 66 75 6e 63 74 69 6f |vatives"| functio|
|000007d0| 6e 20 79 6f 75 20 64 65 | 66 69 6e 65 2e 20 41 6e |n you de|fine. An|
|000007e0| 79 20 64 65 72 69 76 61 | 74 69 76 65 73 20 79 6f |y deriva|tives yo|
|000007f0| 75 20 64 6f 6e 27 74 20 | 63 61 6c 63 75 6c 61 74 |u don't |calculat|
|00000800| 65 20 77 69 6c 6c 20 62 | 65 20 63 61 6c 63 75 6c |e will b|e calcul|
|00000810| 61 74 65 64 20 6e 75 6d | 65 72 69 63 61 6c 6c 79 |ated num|erically|
|00000820| 20 62 79 20 70 72 6f 20 | 46 69 74 20 2a 2f 0d 09 | by pro |Fit */..|
|00000830| 09 09 09 53 74 72 32 35 | 35 20 64 65 73 63 72 31 |...Str25|5 descr1|
|00000840| 73 74 4c 69 6e 65 2c 09 | 09 09 2f 2a 20 66 69 72 |stLine,.|../* fir|
|00000850| 73 74 20 6c 69 6e 65 20 | 6f 66 20 74 68 65 20 74 |st line |of the t|
|00000860| 65 78 74 20 69 6e 20 74 | 68 65 20 70 61 72 61 6d |ext in t|he param|
|00000870| 65 74 65 72 20 77 69 6e | 64 6f 77 20 2a 2f 0d 09 |eter win|dow */..|
|00000880| 09 09 09 53 74 72 32 35 | 35 20 64 65 73 63 72 32 |...Str25|5 descr2|
|00000890| 6e 64 4c 69 6e 65 2c 09 | 09 09 2f 2a 20 73 65 63 |ndLine,.|../* sec|
|000008a0| 6f 6e 64 20 6c 69 6e 65 | 20 6f 66 20 74 68 65 20 |ond line| of the |
|000008b0| 74 65 78 74 20 69 6e 20 | 74 68 65 20 70 61 72 61 |text in |the para|
|000008c0| 6d 65 74 65 72 20 77 69 | 6e 64 6f 77 20 2a 2f 0d |meter wi|ndow */.|
|000008d0| 09 09 09 09 73 68 6f 72 | 74 2a 20 63 6f 6e 73 74 |....shor|t* const|
|000008e0| 20 6e 75 6d 62 65 72 4f | 66 50 61 72 61 6d 73 2c | numberO|fParams,|
|000008f0| 09 2f 2a 20 74 68 65 20 | 6e 75 6d 62 65 72 20 6f |./* the |number o|
|00000900| 66 20 70 61 72 61 6d 65 | 74 65 72 73 20 6f 66 20 |f parame|ters of |
|00000910| 74 68 65 20 66 75 6e 63 | 74 69 6f 6e 20 2a 2f 0d |the func|tion */.|
|00000920| 09 09 09 09 44 65 66 61 | 75 6c 74 50 61 72 61 6d |....Defa|ultParam|
|00000930| 49 6e 66 6f 2a 20 63 6f | 6e 73 74 20 61 30 2c 09 |Info* co|nst a0,.|
|00000940| 09 2f 2a 20 74 68 65 20 | 64 65 66 61 75 6c 74 20 |./* the |default |
|00000950| 6e 61 6d 65 73 2c 20 76 | 61 6c 75 65 73 20 65 74 |names, v|alues et|
|00000960| 63 2e 20 6f 66 20 74 68 | 65 20 70 61 72 61 6d 65 |c. of th|e parame|
|00000970| 74 65 72 73 20 2a 2f 0d | 09 09 09 09 45 78 74 4d |ters */.|....ExtM|
|00000980| 6f 64 75 6c 65 73 50 61 | 72 61 6d 42 6c 6f 63 6b |odulesPa|ramBlock|
|00000990| 2a 20 70 62 29 09 09 2f | 2a 20 74 68 65 20 63 6f |* pb)../|* the co|
|000009a0| 6d 70 6c 65 74 65 20 70 | 61 72 61 6d 65 74 65 72 |mplete p|arameter|
|000009b0| 20 62 6c 6f 63 6b 20 70 | 61 73 73 65 64 20 62 79 | block p|assed by|
|000009c0| 20 70 72 6f 20 46 69 74 | 20 2a 2f 0d 2f 2a 20 49 | pro Fit| */./* I|
|000009d0| 6e 69 74 69 61 6c 69 7a | 65 46 75 6e 63 20 69 73 |nitializ|eFunc is|
|000009e0| 20 63 61 6c 6c 65 64 20 | 6f 6e 63 65 20 28 61 66 | called |once (af|
|000009f0| 74 65 72 20 53 65 74 55 | 70 20 68 61 73 20 62 65 |ter SetU|p has be|
|00000a00| 65 6e 20 63 61 6c 6c 65 | 64 29 20 77 68 65 6e 20 |en calle|d) when |
|00000a10| 74 68 65 20 65 78 74 65 | 72 6e 61 6c 20 6d 6f 64 |the exte|rnal mod|
|00000a20| 75 6c 65 20 69 73 20 6c | 69 6e 6b 65 64 20 74 6f |ule is l|inked to|
|00000a30| 20 70 72 6f 46 69 74 20 | 2a 2f 0d 2f 2a 20 55 73 | proFit |*/./* Us|
|00000a40| 65 64 20 74 6f 20 73 65 | 74 20 61 6c 6c 20 74 68 |ed to se|t all th|
|00000a50| 65 20 69 6e 66 6f 72 6d | 61 74 69 6f 6e 20 6e 65 |e inform|ation ne|
|00000a60| 65 64 65 64 20 74 6f 20 | 64 65 73 63 72 69 62 65 |eded to |describe|
|00000a70| 20 61 20 66 75 6e 63 74 | 69 6f 6e 20 2a 2f 0d 7b | a funct|ion */.{|
|00000a80| 0d 0d 7d 0d 0d 0d 2f 2a | 2a 2a 2a 2a 2a 2a 2a 2a |..}.../*|********|
|00000a90| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000aa0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ab0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ac0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ad0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2f 0d |********|******/.|
|00000ae0| 0d 73 68 6f 72 74 20 43 | 68 65 63 6b 28 09 73 68 |.short C|heck(.sh|
|00000af0| 6f 72 74 20 70 61 72 61 | 6d 4e 6f 2c 09 09 09 09 |ort para|mNo,....|
|00000b00| 09 09 2f 2a 20 74 68 65 | 20 70 61 72 61 6d 65 74 |../* the| paramet|
|00000b10| 65 72 20 74 68 61 74 20 | 77 61 73 20 63 68 61 6e |er that |was chan|
|00000b20| 67 65 64 20 2a 2f 0d 09 | 09 09 09 44 65 66 61 75 |ged */..|...Defau|
|00000b30| 6c 74 50 61 72 61 6d 49 | 6e 66 6f 2a 20 63 6f 6e |ltParamI|nfo* con|
|00000b40| 73 74 20 61 30 2c 09 09 | 2f 2a 20 74 68 65 20 64 |st a0,..|/* the d|
|00000b50| 65 66 61 75 6c 74 20 6e | 61 6d 65 73 2c 20 76 61 |efault n|ames, va|
|00000b60| 6c 75 65 73 20 65 74 63 | 20 6f 66 20 74 68 65 20 |lues etc| of the |
|00000b70| 70 61 72 61 6d 74 65 72 | 73 20 2a 2f 0d 09 09 09 |paramter|s */....|
|00000b80| 09 45 78 74 4d 6f 64 75 | 6c 65 73 50 61 72 61 6d |.ExtModu|lesParam|
|00000b90| 42 6c 6f 63 6b 2a 20 70 | 62 29 09 09 2f 2a 20 74 |Block* p|b)../* t|
|00000ba0| 68 65 20 63 6f 6d 70 6c | 65 74 65 20 70 61 72 61 |he compl|ete para|
|00000bb0| 6d 65 74 65 72 20 62 6c | 6f 63 6b 20 70 61 73 73 |meter bl|ock pass|
|00000bc0| 65 64 20 62 79 20 70 72 | 6f 20 46 69 74 20 2a 2f |ed by pr|o Fit */|
|00000bd0| 0d 09 2f 2a 20 43 61 6e | 20 62 65 20 6c 65 66 74 |../* Can| be left|
|00000be0| 20 65 6d 74 70 79 20 28 | 72 65 74 75 72 6e 69 6e | emtpy (|returnin|
|00000bf0| 67 20 67 6f 6f 64 29 20 | 69 66 20 6e 6f 74 20 6e |g good) |if not n|
|00000c00| 65 65 64 65 64 2e 20 2a | 2f 0d 09 2f 2a 20 63 61 |eeded. *|/../* ca|
|00000c10| 6c 6c 65 64 20 77 68 65 | 6e 20 74 68 65 20 75 73 |lled whe|n the us|
|00000c20| 65 72 20 68 61 73 20 63 | 68 61 6e 67 65 64 20 61 |er has c|hanged a|
|00000c30| 20 76 61 6c 75 65 20 69 | 6e 20 74 68 65 20 70 61 | value i|n the pa|
|00000c40| 72 61 6d 65 74 65 72 73 | 20 77 69 6e 64 6f 77 2e |rameters| window.|
|00000c50| 20 54 68 69 73 20 72 6f | 75 74 69 6e 65 20 2a 2f | This ro|utine */|
|00000c60| 0d 09 2f 2a 20 63 61 6e | 20 74 68 65 6e 20 63 68 |../* can| then ch|
|00000c70| 65 63 6b 20 69 66 20 74 | 68 69 73 20 70 61 72 61 |eck if t|his para|
|00000c80| 6d 65 74 65 72 73 20 69 | 73 20 66 69 6e 65 2e 20 |meters i|s fine. |
|00000c90| 49 74 20 63 61 6e 20 61 | 6c 73 6f 20 63 68 61 6e |It can a|lso chan|
|00000ca0| 67 65 20 73 6f 6d 65 20 | 6f 66 20 74 68 65 20 2a |ge some |of the *|
|00000cb0| 2f 0d 09 2f 2a 20 6f 74 | 68 65 72 20 65 6e 74 72 |/../* ot|her entr|
|00000cc0| 69 65 73 20 69 6e 20 61 | 30 2e 20 54 68 65 20 72 |ies in a|0. The r|
|00000cd0| 65 74 75 72 6e 65 64 20 | 76 61 6c 75 65 73 20 63 |eturned |values c|
|00000ce0| 61 6e 20 62 65 3a 20 2a | 2f 0d 09 2f 2a 09 67 6f |an be: *|/../*.go|
|00000cf0| 6f 64 3a 09 09 72 65 74 | 75 72 6e 20 74 68 69 73 |od:..ret|urn this|
|00000d00| 20 76 61 6c 75 65 20 69 | 66 20 79 6f 75 20 61 67 | value i|f you ag|
|00000d10| 72 65 65 20 77 69 74 68 | 20 74 68 65 20 6e 65 77 |ree with| the new|
|00000d20| 20 70 61 72 61 6d 65 74 | 65 72 20 76 61 6c 75 65 | paramet|er value|
|00000d30| 20 2a 2f 0d 09 2f 2a 09 | 75 70 64 61 74 65 3a 09 | */../*.|update:.|
|00000d40| 09 72 65 74 75 72 6e 20 | 74 68 69 73 20 76 61 6c |.return |this val|
|00000d50| 75 65 20 69 66 20 79 6f | 75 20 77 61 6e 74 20 74 |ue if yo|u want t|
|00000d60| 68 65 20 70 61 72 61 6d | 65 74 65 72 73 20 77 69 |he param|eters wi|
|00000d70| 6e 64 6f 77 20 2a 2f 0d | 09 2f 2a 09 09 09 09 74 |ndow */.|./*....t|
|00000d80| 6f 20 62 65 20 75 70 64 | 61 74 65 64 20 62 65 63 |o be upd|ated bec|
|00000d90| 61 75 73 65 20 79 6f 75 | 20 63 68 61 6e 67 65 64 |ause you| changed|
|00000da0| 20 73 6f 6d 65 20 6f 66 | 20 74 68 65 20 76 61 6c | some of| the val|
|00000db0| 75 65 73 20 69 6e 20 61 | 30 20 2a 2f 0d 09 2f 2a |ues in a|0 */../*|
|00000dc0| 09 62 61 64 3a 09 09 72 | 65 74 75 72 6e 20 74 68 |.bad:..r|eturn th|
|00000dd0| 69 73 20 76 61 6c 75 65 | 20 69 66 20 79 6f 75 20 |is value| if you |
|00000de0| 77 61 6e 74 20 74 68 65 | 20 6e 65 77 20 70 61 72 |want the| new par|
|00000df0| 61 6d 65 74 65 72 20 76 | 61 6c 75 65 20 74 6f 20 |ameter v|alue to |
|00000e00| 62 65 20 72 65 66 75 73 | 65 64 20 2a 2f 0d 0d 7b |be refus|ed */..{|
|00000e10| 09 70 61 72 61 6d 4e 6f | 2d 2d 3b 2f 2a 74 68 65 |.paramNo|--;/*the|
|00000e20| 20 61 72 72 61 79 20 61 | 30 20 69 73 20 69 6e 64 | array a|0 is ind|
|00000e30| 65 78 65 64 20 66 72 6f | 6d 20 7a 65 72 6f 2e 20 |exed fro|m zero. |
|00000e40| 44 65 63 72 65 6d 65 6e | 74 20 70 61 72 61 6d 4e |Decremen|t paramN|
|00000e50| 6f 20 73 6f 20 74 68 61 | 74 20 69 74 20 63 6f 72 |o so tha|t it cor|
|00000e60| 72 65 73 70 6f 6e 64 73 | 20 74 6f 20 74 68 65 20 |responds| to the |
|00000e70| 69 6e 69 64 65 63 65 73 | 20 6f 66 20 61 30 2a 2f |inideces| of a0*/|
|00000e80| 0d 09 72 65 74 75 72 6e | 20 6f 6b 3b 0d 7d 0d 0d |..return| ok;.}..|
|00000e90| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000ea0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000eb0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ec0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ed0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000ee0| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0d 0d 76 6f 69 64 20 |********|/..void |
|00000ef0| 46 69 72 73 74 20 28 09 | 50 61 72 61 6d 41 72 72 |First (.|ParamArr|
|00000f00| 61 79 20 61 2c 09 09 09 | 09 2f 2a 20 74 68 65 20 |ay a,...|./* the |
|00000f10| 6e 65 77 20 70 61 72 61 | 6d 65 74 65 72 73 20 2a |new para|meters *|
|00000f20| 2f 0d 09 09 09 09 45 78 | 74 4d 6f 64 75 6c 65 73 |/.....Ex|tModules|
|00000f30| 50 61 72 61 6d 42 6c 6f | 63 6b 2a 20 70 62 29 09 |ParamBlo|ck* pb).|
|00000f40| 2f 2a 20 74 68 65 20 63 | 6f 6d 70 6c 65 74 65 20 |/* the c|omplete |
|00000f50| 70 61 72 61 6d 65 74 65 | 72 20 62 6c 6f 63 6b 20 |paramete|r block |
|00000f60| 70 61 73 73 65 64 20 62 | 79 20 70 72 6f 20 46 69 |passed b|y pro Fi|
|00000f70| 74 20 2a 2f 0d 09 2f 2a | 20 43 61 6e 20 62 65 20 |t */../*| Can be |
|00000f80| 6c 65 66 74 20 65 6d 74 | 70 79 20 69 66 20 6e 6f |left emt|py if no|
|00000f90| 74 20 6e 65 65 64 65 64 | 2e 20 2a 2f 0d 09 2f 2a |t needed|. */../*|
|00000fa0| 20 43 61 6c 6c 65 64 20 | 77 68 65 6e 65 76 65 72 | Called |whenever|
|00000fb0| 20 74 68 65 20 70 61 72 | 61 6d 65 74 65 72 73 20 | the par|ameters |
|00000fc0| 61 72 65 20 63 68 61 6e | 67 65 64 2e 20 43 61 6e |are chan|ged. Can|
|00000fd0| 20 62 65 20 75 73 65 64 | 20 74 6f 20 61 63 63 65 | be used| to acce|
|00000fe0| 6c 65 72 61 74 65 20 2a | 2f 0d 09 2f 2a 20 73 6f |lerate *|/../* so|
|00000ff0| 6d 65 20 63 61 6c 63 75 | 6c 61 74 69 6f 6e 73 2e |me calcu|lations.|
|00001000| 20 53 65 65 20 6d 61 6e | 75 61 6c 20 66 6f 72 20 | See man|ual for |
|00001010| 6d 6f 72 65 20 69 6e 66 | 6f 20 2a 2f 0d 7b 0d 0d |more inf|o */.{..|
|00001020| 7d 0d 0d 0d 0d 2f 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |}..../**|********|
|00001030| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001040| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001050| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001060| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001070| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2f 0d 0d |********|*****/..|
|00001080| 76 6f 69 64 20 46 75 6e | 63 20 28 09 09 64 6f 75 |void Fun|c (..dou|
|00001090| 62 6c 65 20 78 2c 09 09 | 09 09 09 09 2f 2a 20 74 |ble x,..|..../* t|
|000010a0| 68 65 20 78 2d 76 61 6c | 75 65 20 2a 2f 0d 09 09 |he x-val|ue */...|
|000010b0| 09 09 50 61 72 61 6d 41 | 72 72 61 79 20 61 2c 09 |..ParamA|rray a,.|
|000010c0| 09 09 09 09 2f 2a 20 74 | 68 65 20 70 61 72 61 6d |..../* t|he param|
|000010d0| 65 74 65 72 73 20 2a 2f | 0d 09 09 09 09 64 6f 75 |eters */|.....dou|
|000010e0| 62 6c 65 2a 20 63 6f 6e | 73 74 20 79 2c 09 09 09 |ble* con|st y,...|
|000010f0| 09 2f 2a 20 74 68 65 20 | 79 2d 76 61 6c 75 65 20 |./* the |y-value |
|00001100| 74 6f 20 62 65 20 72 65 | 74 75 72 6e 65 64 20 2a |to be re|turned *|
|00001110| 2f 0d 09 09 09 09 45 78 | 74 4d 6f 64 75 6c 65 73 |/.....Ex|tModules|
|00001120| 50 61 72 61 6d 42 6c 6f | 63 6b 2a 20 70 62 29 09 |ParamBlo|ck* pb).|
|00001130| 09 2f 2a 20 74 68 65 20 | 63 6f 6d 70 6c 65 74 65 |./* the |complete|
|00001140| 20 70 61 72 61 6d 65 74 | 65 72 20 62 6c 6f 63 6b | paramet|er block|
|00001150| 20 70 61 73 73 65 64 20 | 62 79 20 70 72 6f 20 46 | passed |by pro F|
|00001160| 69 74 20 2a 2f 0d 09 2f | 2a 20 63 61 6c 6c 65 64 |it */../|* called|
|00001170| 20 74 6f 20 63 61 6c 63 | 75 6c 61 74 65 20 74 68 | to calc|ulate th|
|00001180| 65 20 79 2d 76 61 6c 75 | 65 20 6f 66 20 74 68 65 |e y-valu|e of the|
|00001190| 20 66 75 6e 63 74 69 6f | 6e 20 66 6f 72 20 61 20 | functio|n for a |
|000011a0| 67 69 76 65 6e 20 78 20 | 61 6e 64 20 61 20 67 69 |given x |and a gi|
|000011b0| 76 65 6e 20 2a 2f 0d 09 | 2f 2a 20 73 65 74 20 6f |ven */..|/* set o|
|000011c0| 66 20 70 61 72 61 6d 65 | 74 65 72 73 20 2a 2f 0d |f parame|ters */.|
|000011d0| 7b 0d 0d 7d 0d 0d 0d 0d | 2f 2a 2a 2a 2a 2a 2a 2a |{..}....|/*******|
|000011e0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000011f0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001200| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001210| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001220| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001230| 2f 0d 0d 76 6f 69 64 20 | 44 65 72 69 76 61 74 69 |/..void |Derivati|
|00001240| 76 65 73 28 64 6f 75 62 | 6c 65 20 78 2c 09 09 09 |ves(doub|le x,...|
|00001250| 09 09 09 2f 2a 20 74 68 | 65 20 78 2d 76 61 6c 75 |.../* th|e x-valu|
|00001260| 65 20 2a 2f 0d 09 09 09 | 09 50 61 72 61 6d 41 72 |e */....|.ParamAr|
|00001270| 72 61 79 20 61 2c 09 09 | 09 09 09 2f 2a 20 74 68 |ray a,..|.../* th|
|00001280| 65 20 70 61 72 61 6d 65 | 74 65 72 73 20 2a 2f 0d |e parame|ters */.|
|00001290| 09 09 09 09 50 61 72 61 | 6d 41 72 72 61 79 20 64 |....Para|mArray d|
|000012a0| 79 64 61 2c 09 09 09 09 | 2f 2a 20 74 68 65 20 64 |yda,....|/* the d|
|000012b0| 65 72 69 76 61 74 69 76 | 65 73 20 74 6f 20 62 65 |erivativ|es to be|
|000012c0| 20 72 65 74 75 72 6e 65 | 64 20 2a 2f 0d 09 09 09 | returne|d */....|
|000012d0| 09 45 78 74 4d 6f 64 75 | 6c 65 73 50 61 72 61 6d |.ExtModu|lesParam|
|000012e0| 42 6c 6f 63 6b 2a 20 70 | 62 29 09 09 2f 2a 20 74 |Block* p|b)../* t|
|000012f0| 68 65 20 63 6f 6d 70 6c | 65 74 65 20 70 61 72 61 |he compl|ete para|
|00001300| 6d 65 74 65 72 20 62 6c | 6f 63 6b 20 70 61 73 73 |meter bl|ock pass|
|00001310| 65 64 20 62 79 20 70 72 | 6f 20 46 69 74 20 2a 2f |ed by pr|o Fit */|
|00001320| 0d 09 2f 2a 20 63 61 6c | 6c 65 64 20 74 6f 20 63 |../* cal|led to c|
|00001330| 61 6c 63 75 6c 61 74 65 | 20 74 68 65 20 70 61 72 |alculate| the par|
|00001340| 74 69 61 6c 20 64 65 72 | 69 76 61 74 69 76 65 73 |tial der|ivatives|
|00001350| 20 6f 66 20 74 68 65 20 | 66 75 6e 63 74 69 6f 6e | of the |function|
|00001360| 20 77 69 74 68 20 72 65 | 73 70 65 63 74 20 74 6f | with re|spect to|
|00001370| 20 2a 2f 0d 09 2f 2a 20 | 69 74 73 20 70 61 72 61 | */../* |its para|
|00001380| 6d 65 74 65 72 73 2e 20 | 54 68 65 20 65 6c 65 6d |meters. |The elem|
|00001390| 65 6e 74 73 20 6f 66 20 | 74 68 65 20 61 72 72 61 |ents of |the arra|
|000013a0| 79 20 22 64 79 64 61 5b | 69 5d 22 20 6d 75 73 74 |y "dyda[|i]" must|
|000013b0| 20 62 65 20 73 65 74 20 | 74 6f 20 74 68 65 20 64 | be set |to the d|
|000013c0| 65 72 69 76 61 74 69 76 | 65 73 20 6f 66 09 2a 2f |erivativ|es of.*/|
|000013d0| 0d 09 2f 2a 20 74 68 65 | 20 66 75 6e 63 74 69 6f |../* the| functio|
|000013e0| 6e 20 77 69 74 68 20 72 | 65 73 70 65 63 74 20 74 |n with r|espect t|
|000013f0| 6f 20 70 61 72 61 6d 65 | 74 65 72 20 6e 75 6d 62 |o parame|ter numb|
|00001400| 65 72 20 22 69 22 2e 20 | 49 66 20 61 6e 79 20 64 |er "i". |If any d|
|00001410| 79 64 61 5b 69 5d 20 69 | 73 20 6e 6f 74 20 73 65 |yda[i] i|s not se|
|00001420| 74 20 62 79 20 09 2a 2f | 0d 09 2f 2a 20 74 68 69 |t by .*/|../* thi|
|00001430| 73 20 66 75 6e 63 74 69 | 6f 6e 2c 20 74 68 65 6e |s functi|on, then|
|00001440| 20 74 68 65 20 64 65 72 | 69 76 61 74 69 76 65 73 | the der|ivatives|
|00001450| 20 77 69 6c 6c 20 62 65 | 20 63 61 6c 63 75 6c 61 | will be| calcula|
|00001460| 74 65 64 20 6e 75 6d 65 | 72 69 63 61 6c 6c 79 20 |ted nume|rically |
|00001470| 62 79 20 70 72 6f 20 46 | 69 74 2e 20 2a 2f 0d 09 |by pro F|it. */..|
|00001480| 2f 2a 20 49 66 20 79 6f | 75 20 73 65 74 20 68 61 |/* If yo|u set ha|
|00001490| 73 44 65 72 69 76 61 74 | 69 76 65 73 20 74 6f 20 |sDerivat|ives to |
|000014a0| 66 61 6c 73 65 20 69 6e | 20 46 75 6e 63 49 6e 69 |false in| FuncIni|
|000014b0| 74 69 61 6c 69 7a 65 2c | 20 74 68 65 6e 20 41 4c |tialize,| then AL|
|000014c0| 4c 20 64 65 72 69 76 61 | 74 69 76 65 73 20 77 69 |L deriva|tives wi|
|000014d0| 6c 6c 20 61 6c 77 61 79 | 73 20 2a 2f 0d 09 2f 2a |ll alway|s */../*|
|000014e0| 20 62 65 20 63 61 6c 63 | 75 61 74 65 64 20 6e 75 | be calc|uated nu|
|000014f0| 6d 65 72 69 63 61 6c 6c | 79 20 62 79 20 70 72 6f |mericall|y by pro|
|00001500| 20 46 69 74 2c 20 6e 6f | 20 6d 61 74 74 65 72 20 | Fit, no| matter |
|00001510| 77 68 61 74 20 79 6f 75 | 20 64 6f 20 69 6e 20 74 |what you| do in t|
|00001520| 68 65 20 66 75 6e 63 74 | 69 6f 6e 20 22 44 65 72 |he funct|ion "Der|
|00001530| 69 76 61 74 69 76 65 73 | 22 20 2a 2f 0d 09 2f 2a |ivatives|" */../*|
|00001540| 20 49 66 20 61 20 64 65 | 72 69 76 61 74 69 76 65 | If a de|rivative|
|00001550| 20 69 73 20 74 6f 6f 20 | 63 6f 6d 70 6c 69 63 61 | is too |complica|
|00001560| 74 65 64 20 74 6f 20 62 | 65 20 63 61 6c 63 75 6c |ted to b|e calcul|
|00001570| 61 74 65 64 20 61 6e 61 | 6c 79 74 69 63 61 6c 6c |ated ana|lyticall|
|00001580| 79 2c 20 74 68 65 6e 20 | 64 6f 6e 27 74 20 73 65 |y, then |don't se|
|00001590| 74 20 74 68 65 20 2a 2f | 0d 09 2f 2a 20 63 6f 72 |t the */|../* cor|
|000015a0| 72 65 73 70 6f 6e 64 69 | 6e 67 20 22 64 79 64 61 |respondi|ng "dyda|
|000015b0| 22 2e 20 70 72 6f 20 46 | 69 74 20 77 69 6c 6c 20 |". pro F|it will |
|000015c0| 6e 6f 74 69 63 65 20 74 | 68 69 73 20 61 6e 64 20 |notice t|his and |
|000015d0| 63 61 6c 63 75 6c 61 74 | 65 20 74 68 61 74 20 64 |calculat|e that d|
|000015e0| 65 72 69 76 61 74 69 76 | 65 20 6e 75 6d 65 72 69 |erivativ|e numeri|
|000015f0| 63 61 6c 6c 79 2e 20 2a | 2f 0d 09 2f 2a 20 49 66 |cally. *|/../* If|
|00001600| 20 79 6f 75 20 61 72 65 | 20 61 62 6c 65 20 74 6f | you are| able to|
|00001610| 20 63 61 6c 63 75 6c 61 | 74 65 20 74 68 65 20 64 | calcula|te the d|
|00001620| 79 64 61 20 61 6e 61 6c | 79 74 69 63 61 6c 6c 79 |yda anal|ytically|
|00001630| 2c 20 64 6f 20 73 6f 21 | 20 42 79 20 64 6f 69 6e |, do so!| By doin|
|00001640| 67 20 74 68 69 73 20 79 | 6f 75 20 77 69 6c 6c 20 |g this y|ou will |
|00001650| 6d 61 6b 65 20 2a 2f 0d | 09 2f 2a 20 66 69 74 74 |make */.|./* fitt|
|00001660| 69 6e 67 20 6d 75 63 68 | 2c 20 6d 75 63 68 20 66 |ing much|, much f|
|00001670| 61 73 74 65 72 2e 20 2a | 2f 0d 7b 0d 0d 7d 0d 0d |aster. *|/.{..}..|
|00001680| 0d 2f 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |./******|********|
|00001690| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000016d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2f 0d 0d 76 6f 69 64 |********|*/..void|
|000016e0| 20 4c 61 73 74 20 28 45 | 78 74 4d 6f 64 75 6c 65 | Last (E|xtModule|
|000016f0| 73 50 61 72 61 6d 42 6c | 6f 63 6b 2a 20 70 62 29 |sParamBl|ock* pb)|
|00001700| 0d 09 2f 2a 20 43 61 6e | 20 62 65 20 6c 65 66 74 |../* Can| be left|
|00001710| 20 65 6d 74 70 79 20 69 | 66 20 6e 6f 74 20 6e 65 | emtpy i|f not ne|
|00001720| 65 64 65 64 2e 20 2a 2f | 0d 09 2f 2a 20 43 61 6c |eded. */|../* Cal|
|00001730| 6c 65 64 20 77 68 65 6e | 20 63 61 6c 63 75 6c 61 |led when| calcula|
|00001740| 74 69 6e 67 20 69 73 20 | 74 68 72 6f 75 67 68 2e |ting is |through.|
|00001750| 20 53 65 65 20 6d 61 6e | 75 61 6c 20 66 6f 72 20 | See man|ual for |
|00001760| 6d 6f 72 65 20 69 6e 66 | 6f 20 2a 2f 0d 7b 0d 0d |more inf|o */.{..|
|00001770| 7d 0d 0d 2f 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |}../****|********|
|00001780| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001790| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000017a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000017b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000017c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0d 0d 76 6f |********|***/..vo|
|000017d0| 69 64 20 43 6c 65 61 6e | 55 70 20 28 45 78 74 4d |id Clean|Up (ExtM|
|000017e0| 6f 64 75 6c 65 73 50 61 | 72 61 6d 42 6c 6f 63 6b |odulesPa|ramBlock|
|000017f0| 2a 20 70 62 29 0d 09 2f | 2a 20 63 61 6c 6c 65 64 |* pb)../|* called|
|00001800| 20 77 68 65 6e 20 74 68 | 65 20 66 75 6e 63 74 69 | when th|e functi|
|00001810| 6f 6e 20 6f 72 20 70 72 | 6f 67 72 61 6d 20 69 73 |on or pr|ogram is|
|00001820| 20 72 65 6d 6f 76 65 64 | 20 66 72 6f 6d 20 70 72 | removed| from pr|
|00001830| 6f 20 46 69 74 27 73 20 | 6d 65 6e 75 73 20 2a 2f |o Fit's |menus */|
|00001840| 0d 09 2f 2a 20 69 6e 20 | 6d 6f 73 74 20 63 61 73 |../* in |most cas|
|00001850| 65 73 2c 20 74 68 69 73 | 20 66 75 6e 63 74 69 6f |es, this| functio|
|00001860| 6e 20 63 61 6e 20 62 65 | 20 65 6d 70 74 79 20 2a |n can be| empty *|
|00001870| 2f 0d 7b 0d 0d 7d 0d 0d | 0d 0d 0d 0d 0d 0d 0d 0d |/.{..}..|........|
|00001880| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00001890| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000018a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000018b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000018c0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000018d0| 2a 2a 2a 2a 2a 2a 2a 2a | 2f 0d 09 09 09 09 09 09 |********|/.......|
|000018e0| 2f 2a 20 66 6f 72 20 70 | 72 6f 67 72 61 6d 73 2c |/* for p|rograms,|
|000018f0| 20 6e 6f 74 20 75 73 65 | 64 20 68 65 72 65 3a 20 | not use|d here: |
|00001900| 2a 2f 0d 2f 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |*/./****|********|
|00001910| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001920| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001930| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001940| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00001950| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2f 0d 0d 0d 0d |********|***/....|
|00001960| 76 6f 69 64 20 49 6e 69 | 74 69 61 6c 69 7a 65 50 |void Ini|tializeP|
|00001970| 72 6f 67 20 28 45 78 74 | 4d 6f 64 75 6c 65 73 50 |rog (Ext|ModulesP|
|00001980| 61 72 61 6d 42 6c 6f 63 | 6b 2a 20 70 62 29 0d 7b |aramBloc|k* pb).{|
|00001990| 7d 0d 0d 76 6f 69 64 20 | 52 75 6e 28 45 78 74 4d |}..void |Run(ExtM|
|000019a0| 6f 64 75 6c 65 73 50 61 | 72 61 6d 42 6c 6f 63 6b |odulesPa|ramBlock|
|000019b0| 2a 20 70 62 29 0d 7b 7d | 0d 00 00 00 00 00 00 00 |* pb).{}|........|
|000019c0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019d0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019e0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|000019f0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a00| 00 00 01 00 00 00 01 4c | 00 00 00 4c 00 00 00 32 |.......L|...L...2|
|00001a10| 20 63 6f 6c 48 20 69 73 | 20 6f 66 20 74 79 70 65 | colH is| of type|
|00001a20| 20 54 65 78 74 43 6f 6c | 75 6d 6e 48 61 6e 64 6c | TextCol|umnHandl|
|00001a30| 12 46 75 6e 63 74 69 6f | 6e 54 65 6d 70 6c 61 74 |.Functio|nTemplat|
|00001a40| 65 2e 63 6c 02 00 00 00 | 54 45 58 54 4b 41 48 4c |e.cl....|TEXTKAHL|
|00001a50| 00 00 54 45 58 54 4b 41 | 48 4c 09 00 ff ec 00 c0 |..TEXTKA|HL......|
|00001a60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001a70| 00 00 ad 0f 61 c8 00 00 | 19 39 00 00 01 7e 47 65 |....a...|.9...~Ge|
|00001a80| 74 43 6f 6c 54 79 70 65 | 29 0d 0d 09 09 4f 6e 63 |tColType|)....Onc|
|00001a90| 65 20 79 6f 75 20 63 61 | 6c 6c 20 53 65 74 43 6f |e you ca|ll SetCo|
|00001aa0| 6c 48 61 6e 64 6c 65 2c | 20 74 68 65 20 68 61 6e |lHandle,| the han|
|00001ab0| 64 6c 65 20 62 65 63 6f | 6d 65 73 20 70 72 6f 70 |dle beco|mes prop|
|00001ac0| 65 72 74 79 20 6f 66 20 | 70 72 6f 20 46 69 74 20 |erty of |pro Fit |
|00001ad0| d1 20 64 6f 0d 09 09 6e | 6f 74 20 64 69 73 70 6f |. do...n|ot dispo|
|00001ae0| 73 65 20 69 74 2e 0d 09 | 09 63 6f 6c 48 20 63 61 |se it...|.colH ca|
|00001af0| 6e 20 65 69 74 68 65 72 | 20 62 65 3a 0d 20 09 09 |n either| be:. ..|
|00001b00| 00 00 00 48 00 09 4d 6f | 6e 61 63 6f 00 00 00 00 |...H..Mo|naco....|
|00001b10| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001b20| 00 00 00 00 00 00 00 06 | 00 04 00 2a 00 03 01 dd |........|...*....|
|00001b30| 02 7d 00 29 00 07 01 a6 | 02 7e ad 0f 63 f6 00 00 |.}.)....|.~..c...|
|00001b40| 00 65 00 00 00 65 00 00 | 00 00 00 00 00 00 01 00 |.e...e..|........|
|00001b50| 00 00 01 4c 00 00 00 4c | 00 00 00 32 00 64 8e f0 |...L...L|...2.d..|
|00001b60| 12 00 00 00 00 1c 00 32 | 00 00 4d 50 53 52 00 00 |.......2|..MPSR..|
|00001b70| 00 0a 03 ed ff ff 00 00 | 00 00 00 64 8d 58 00 00 |........|...d.X..|
+--------+-------------------------+-------------------------+--------+--------+